Public Class CPDATask2 : Inherits CTaskBase

    Private m_EmpCd As String
    Private m_PdaNo As String

    '
    Private m_ChkMazdaLabel As String
    Private m_ChkDNLabel As String
    Private m_ChkBeanLabel As String
    Private m_ChkCustLabel As String



    Private m_WindowManager As CMainWindowManager
    Private m_Hardware As CCasioDTX7
    Private m_MazadaLabel As String


    Private m_SendLockObject As New Object

    Public Property SendLockObject() As Object
        Get
            Return m_SendLockObject
        End Get
        Set(ByVal value As Object)
            m_SendLockObject = value
        End Set
    End Property


    Public Property Hardware() As CCasioDTX7
        Get
            Return m_Hardware
        End Get
        Set(ByVal value As CCasioDTX7)
            m_Hardware = value
        End Set
    End Property

    Public Property WindowManager() As CMainWindowManager
        Get
            Return m_WindowManager
        End Get
        Set(ByVal value As CMainWindowManager)
            m_WindowManager = value
        End Set
    End Property

    Public Property EmpCd() As String
        Get
            Return m_EmpCd
        End Get
        Set(ByVal value As String)
            m_EmpCd = value
        End Set
    End Property

    Public Property PdaNo() As String
        Get
            Return m_PdaNo
        End Get
        Set(ByVal value As String)
            m_PdaNo = value
        End Set
    End Property

    Public Property MazadaLabel() As String
        Get
            Return m_MazadaLabel
        End Get
        Set(ByVal value As String)
            m_MazadaLabel = value
        End Set
    End Property

    Public Property ChkMazdaLabel() As String
        Get
            Return m_ChkMazdaLabel
        End Get
        Set(ByVal value As String)
            m_ChkMazdaLabel = value
        End Set
    End Property

    Public Property ChkDNLabel() As String
        Get
            Return m_ChkDNLabel
        End Get
        Set(ByVal value As String)
            m_ChkDNLabel = value
        End Set
    End Property

    Public Property ChkBeanLabel() As String
        Get
            Return m_ChkBeanLabel
        End Get
        Set(ByVal value As String)
            m_ChkBeanLabel = value
        End Set
    End Property

    Public Property ChkCustLabel() As String
        Get
            Return m_ChkCustLabel
        End Get
        Set(ByVal value As String)
            m_ChkCustLabel = value
        End Set
    End Property

    Public Sub New(ByVal queue As CDataQueue)
        MyBase.New(queue)
    End Sub

End Class
